cyber.net interactivo 3/inter@ivo 1996-04.iso/cybint3/bin/lou.dxr/00012.ls

Text File | 1996-03-22 | 435 b | 25 lines

on exitFrame
  if rollOver(2) then
    if the visible of sprite 2 = 0 then
      if soundBusy(2) = 0 then
        sound playFile 2, "..\som\gato.wav"
      end if
      set the visible of sprite 2 to 1
    end if
    if the frame = 17 then
      go(11)
    end if
  else
    sound stop 2
    set the visible of sprite 2 to 0
    go(the frame)
  end if
end

on mouseUp
  if rollOver(2) then
    sound stop 2
    go("Ecr3")
  end if
end